program efso_driver

  use efso_mod

  implicit none

  character(1024) file_path

  call get_command_argument(1, file_path)

  call efso_init(file_path)

  call efso_run()

  call efso_final()

end program efso_driver
